USE [TESTBUILDER_DESA_000]
GO

/****** Object:  StoredProcedure [dbo].[SP_	GET_PRUEBA_DISENNO]    Script Date: 09/07/2011 19:52:38 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO




CREATE Procedure [dbo].[SP_	GET_PRUEBA_DISENNO]
	@Texto varchar(500)
	,@S_AUD_USUARIO_C VARCHAR(30)
AS

SET NOCOUNT ON;

select 
	p_prueba,
	I_NRO_SECCIONES ,
	S_CODIGO_PRUEBA ,
	S_NOMBRE_PRUEBA ,
	S_ESTADO,
	s_observacion
from dbo.TB_PRUEBA_DISENO
where S_AUD_USUARIO_C = @S_AUD_USUARIO_C
AND (S_NOMBRE_PRUEBA like '%' + @Texto + '%'
or S_CODIGO_PRUEBA  like '%' + @Texto + '%')


GO

/****** Object:  StoredProcedure [dbo].[SP_ACTUALIZA_PRUEBA_DISENNO]    Script Date: 09/07/2011 19:52:39 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO





Create Procedure [dbo].[SP_ACTUALIZA_PRUEBA_DISENNO]
 @ID_PRUEBA numeric(18,0)
,@NRO_SECCIONES int
,@CODIGO_PRUEBA varchar(90)
,@NOMBRE_PRUEBA varchar(150)
,@ESTADO varchar(1)
AS

SET NOCOUNT ON;

UPDATE dbo.TB_PRUEBA_DISENO
SET I_NRO_SECCIONES =@NRO_SECCIONES
,S_CODIGO_PRUEBA =@CODIGO_PRUEBA
,S_NOMBRE_PRUEBA =@NOMBRE_PRUEBA
WHERE p_PRUEBA = @ID_PRUEBA
  




GO

/****** Object:  StoredProcedure [dbo].[SP_ACTUALIZA_PRUEBA_DISENO_SECCION]    Script Date: 09/07/2011 19:52:39 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
  
  
  
CREATE Procedure [dbo].[SP_ACTUALIZA_PRUEBA_DISENO_SECCION]  
 @ID_SECCION numeric(18,0)  
,@NOMBRE_SECCION varchar(150)  
,@OBSERVACION_SECCION varchar(4000)  
,@PUNTOS int  
AS  
  
SET NOCOUNT ON;  
  
UPDATE  dbo.TB_PRUEBA_DISENO_SECCION  
SET S_NOMBRE_SECCION = @NOMBRE_SECCION  
,I_PUNTOS = @PUNTOS  
 WHERE p_SECCION  = @ID_SECCION  
    
  
  
  
GO

/****** Object:  StoredProcedure [dbo].[SP_CARGA_OBJETOS_ALUMNOS]    Script Date: 09/07/2011 19:52:40 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE PROCEDURE  [dbo].[SP_CARGA_OBJETOS_ALUMNOS]  
  @ID VARCHAR(90)  
AS  
  

SELECT 
 s_rut S_RUT_ALUMNO	
,s_nombre S_NOMBRES_ALUMNO
,s_paterno S_PATERNO_ALUMNO
,s_materno S_MATERNO_ALUMNO
,S_DIRECCION	
,FK_CIUDAD
,FK_COMUNA
,P_ALUMNO	
,CONVERT(VARCHAR,D_FECHA_NAC	,103) D_FECHA_NAC
FROM dbo.TB_EST_ALUMNO  
where p_alumno= @id

--SELECT CONVERT(VARCHAR,GETDATE()	,103)
GO

/****** Object:  StoredProcedure [dbo].[SP_CREAR_PREGUNTA_DISENNO]    Script Date: 09/07/2011 19:52:40 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
  
  
  
CREATE Procedure [dbo].[SP_CREAR_PREGUNTA_DISENNO]  
			@P_PREGUNTA numeric(18,0)   
           ,@K_SECCION  numeric(18,0)   
           ,@S_DESCRIPCION_PREGUNTA varchar(4000)   
           ,@M_IMAGEN_PREGUNTA  image   
           ,@S_MUESTRA_IMAGEN  varchar(1)   
           ,@I_PUNTOS_PREGUNTA  int   
           ,@S_VIGENTE  varchar(1)   
           ,@I_NRO_PREGUNTA  int   
           ,@S_AUD_USUARIO  varchar(50)             
           ,@K_TIPO_PREGUNTA  numeric(18,0)   
           ,@I_CHK_IMAGEN  int   
           ,@S_IMAGEN_PREGUNTA  varchar(4000)  
           ,@URL_IMAGEN VARCHAR(500) 
AS  
  
SET NOCOUNT ON;  
  
  
  
 if @P_PREGUNTA = 0
 begin
  select @I_NRO_PREGUNTA = max(isnull(I_NRO_PREGUNTA,0))+1 from [TB_PRUEBA_DISENO_PREGUNTA] where k_seccion = @K_SECCION

  INSERT INTO  [TB_PRUEBA_DISENO_PREGUNTA]   
                        (   
                         K_SECCION   
                        ,S_DESCRIPCION_PREGUNTA   
                        ,M_IMAGEN_PREGUNTA   
                        ,S_MUESTRA_IMAGEN   
                        ,I_PUNTOS_PREGUNTA   
                        ,S_VIGENTE   
                        ,I_NRO_PREGUNTA   
                        ,S_AUD_USUARIO_C   
                        ,D_AUD_FECHA_C    
                        ,K_TIPO_PREGUNTA   
                        ,I_CHK_IMAGEN   
                        ,S_IMAGEN_PREGUNTA
                        ,S_URL_IMAGEN)   
                  VALUES   
                        (   
                         @K_SECCION   
                        ,@S_DESCRIPCION_PREGUNTA   
                        ,@M_IMAGEN_PREGUNTA   
                        ,@S_MUESTRA_IMAGEN   
                        ,@I_PUNTOS_PREGUNTA   
                        ,@S_VIGENTE   
                        ,@I_NRO_PREGUNTA   
                        ,@S_AUD_USUARIO   
                        ,convert( varchar,getdate()   , 112)
                        ,@K_TIPO_PREGUNTA   
                        ,@I_CHK_IMAGEN   
                        ,@S_IMAGEN_PREGUNTA
                        ,@URL_IMAGEN   
                        )   
  
	select @@IDENTITY  
  
 
 end
 else
 begin
	 
			  UPDATE  [TB_PRUEBA_DISENO_PREGUNTA]   
			  SET K_SECCION   = @K_SECCION
			  ,S_DESCRIPCION_PREGUNTA	=    @S_DESCRIPCION_PREGUNTA 
			  -- ,M_IMAGEN_PREGUNTA		=    @M_IMAGEN_PREGUNTA
			  --,S_MUESTRA_IMAGEN			=    'S'
			  ,I_PUNTOS_PREGUNTA		=    @I_PUNTOS_PREGUNTA
			  ,S_VIGENTE				=    @S_VIGENTE
			  --,I_NRO_PREGUNTA			=    @I_NRO_PREGUNTA
			  ,S_AUD_USUARIO_M			=    @S_AUD_USUARIO
			  ,D_AUD_FECHA_M			=    convert( varchar,getdate()   , 112)
			  ,K_TIPO_PREGUNTA			=    @K_TIPO_PREGUNTA
			 -- ,I_CHK_IMAGEN				=    @I_CHK_IMAGEN
			 -- ,S_IMAGEN_PREGUNTA		=    @S_IMAGEN_PREGUNTA
			--  ,S_URL_IMAGEN				=    @URL_IMAGEN
		      WHERE    P_PREGUNTA		=    @P_PREGUNTA
		    
 
	SELECT @P_PREGUNTA
 end
  
  
  
  
GO

/****** Object:  StoredProcedure [dbo].[SP_CREAR_PRUEBA_DISENNO]    Script Date: 09/07/2011 19:52:41 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

 CREATE Procedure [dbo].[SP_CREAR_PRUEBA_DISENNO]
  @P_PRUEBA numeric(18,0)
 ,@S_CODIGO_PRUEBA varchar(90)
 ,@S_NOMBRE_PRUEBA varchar(150)
 ,@S_OBSERVACION  varchar(4000)
 ,@puntos int
 ,@ramo int
 ,@curso int
 ,@nivel int
 ,@vigencia varchar(1)
 ,@S_AUD_USUARIO_C varchar(50)
 
 --'txt_id_prueba
 --       'txt_codigo_prueba
 --       'txt_titulo_prueba
 --       'txt_Observacion_prueba
 --       'cmb_puntos
 --       'cmb_ramo
 --       'cmb_curso
 --       'cmb_nivel
 --       'CMB_VIGENCIA
        


 as
 
 
 SET NOCOUNT ON;
 if @P_PRUEBA=0
 begin
	select @P_PRUEBA = isnull(max(P_PRUEBA),0) + 1 from TB_PRUEBA_DISENO

	
	INSERT INTO [dbo].[TB_PRUEBA_DISENO]
           ([P_PRUEBA]
           ,[I_PUNTOS]
           ,[S_CODIGO_PRUEBA]
           ,[S_NOMBRE_PRUEBA]
           ,[S_ESTADO]
           ,[S_AUD_USUARIO_C]
           ,[S_AUD_USUARIO_M]
           ,[S_OBSERVACION]
           ,[D_AUD_FECHA_C]
           ,[D_AUD_FECHA_M]
           ,[FK_RAMO]
           ,[FK_CURSO]
           ,[FK_NIVEL])
     VALUES
           (@P_PRUEBA
           ,@PUNTOS
           ,@S_CODIGO_PRUEBA
           ,@S_NOMBRE_PRUEBA 
           ,@vigencia 
           ,@S_AUD_USUARIO_C
           ,@S_AUD_USUARIO_C
           ,@S_OBSERVACION
           ,GETDATE()
           , GETDATE()
           ,@RAMO
           ,@CURSO
           ,@NIVEL
           )

 End
 else
 begin
 
	UPDATE dbo.TB_PRUEBA_DISENO
	SET S_NOMBRE_PRUEBA =@S_NOMBRE_PRUEBA
	,S_OBSERVACION = @S_OBSERVACION
	,D_AUD_FECHA_M = GETDATE()
	,S_AUD_USUARIO_M = @S_AUD_USUARIO_C
	,[FK_NIVEL] = @nivel 
	,[FK_RAMO] = @ramo 
    ,[FK_CURSO] = @curso 
    ,S_ESTADO  =@vigencia 
    ,I_PUNTOS = @puntos 
	WHERE p_PRUEBA = @P_PRUEBA
 
 
 end
 
 
select @P_PRUEBA


GO

/****** Object:  StoredProcedure [dbo].[SP_CREAR_PRUEBA_DISENNO_SECCION]    Script Date: 09/07/2011 19:52:41 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

    
    
CREATE Procedure [dbo].[SP_CREAR_PRUEBA_DISENNO_SECCION]    
 @ID_SECCION numeric(18,0)    
,@FK_PRUEBA NUMERIC(18,0)    
,@NOMBRE_SECCION varchar(150)    
,@PUNTOS int    
,@observacion varchar(4000)  
AS    
    
SET NOCOUNT ON;    
   
  declare @i_nro_seccion int   
  select @i_nro_seccion= isnull(max(isnull(i_nro_seccion,0)),0) + 1 from TB_PRUEBA_DISENO_SECCION where k_prueba= @FK_PRUEBA  
    
 --   select * from TB_PRUEBA_DISENO_SECCION
    
INSERT INTO TB_PRUEBA_DISENO_SECCION    
(     
 K_PRUEBA     
,S_NOMBRE_SECCION     
,I_PUNTOS   
,i_nro_seccion  
,s_observacion  
)    
VALUES    
(    
 @FK_PRUEBA     
,@NOMBRE_SECCION     
,@PUNTOS   
,@i_nro_seccion  
,@observacion 
)    
    
SELECT @@IDENTITY    
    
GO

/****** Object:  StoredProcedure [dbo].[SP_ELIMINA_PRUEBA_DISENNO]    Script Date: 09/07/2011 19:52:42 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



create Procedure [dbo].[SP_ELIMINA_PRUEBA_DISENNO]
 @ID_PRUEBA numeric(18,0)
AS

SET NOCOUNT ON;

	delete dbo.TB_PRUEBA_DISENO
	where p_prueba = @ID_PRUEBA
GO

/****** Object:  StoredProcedure [dbo].[SP_ELIMINA_PRUEBA_DISENNO_SECCION]    Script Date: 09/07/2011 19:52:42 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


CREATE Procedure [dbo].[SP_ELIMINA_PRUEBA_DISENNO_SECCION]
 @ID_SECCION numeric(18,0)
AS

SET NOCOUNT ON;

DELETE TB_PRUEBA_DISENO_SECCION
WHERE p_SECCION = @ID_SECCION

GO

/****** Object:  StoredProcedure [dbo].[SP_ELIMINAR_TB_ALUMNOS]    Script Date: 09/07/2011 19:52:42 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:		<Author,,Name>
-- Create date: <Create Date,,>
-- Description:	<Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[SP_ELIMINAR_TB_ALUMNOS]
  @ID AS VARCHAR(30)
  ,@usuario as varchar(30)
as
BEGIN
	
	SET NOCOUNT ON;

     DELETE FROM  TB_EST_ALUMNO
     WHERE P_ALUMNO = @ID
END

GO

/****** Object:  StoredProcedure [dbo].[SP_GET_BUSCA_PRUEBA]    Script Date: 09/07/2011 19:52:43 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

create procedure [dbo].[SP_GET_BUSCA_PRUEBA]
	@TEXTO VARCHAR(90)
AS
select * from dbo.TB_PRUEBA_DISENO 
GO

/****** Object:  StoredProcedure [dbo].[SP_GET_BUSQUEDA_ALUMNOS_1]    Script Date: 09/07/2011 19:52:43 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE procedure [dbo].[SP_GET_BUSQUEDA_ALUMNOS_1]
	@busqueda varchar(90)
as

select p_alumno as ID
,S_rut as Rut
,CONVERT(VARCHAR,D_FECHA_NAC	,103) as [Fecha Nacimiento]
,s_nombre Nombre
,s_paterno [Ap. Paterno]
,s_Materno [Ap. Materno]
from TB_EST_ALUMNO
where S_rut like '%' + @busqueda + '%' or 
	  s_nombre like '%' + @busqueda + '%' or 
	  s_paterno like '%' + @busqueda + '%' or 
	  s_materno like '%' + @busqueda + '%'  	  

GO

/****** Object:  StoredProcedure [dbo].[SP_GET_CIUDAD]    Script Date: 09/07/2011 19:52:43 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



CREATE PROCEDURE  [dbo].[SP_GET_CIUDAD]

AS
	SELECT * FROM SYS_CONCEPTO WHERE S_TABLA ='CIUDAD'
	UNION
	SELECT 0,'',0,'Seleccione',null
	
GO

/****** Object:  StoredProcedure [dbo].[SP_GET_COMUNA]    Script Date: 09/07/2011 19:52:43 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



CREATE PROCEDURE  [dbo].[SP_GET_COMUNA]
   @CIUDAD VARCHAR(50)
AS
	SELECT * FROM SYS_CONCEPTO WHERE S_TABLA ='COMUNA'
	AND S_RELAC= @CIUDAD
		UNION
	SELECT 0,'',0,'Seleccione',null
GO

/****** Object:  StoredProcedure [dbo].[SP_GET_CONCEPTO]    Script Date: 09/07/2011 19:52:44 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



CREATE PROCEDURE  [dbo].[SP_GET_CONCEPTO]
  @S_TABLA VARCHAR(90)
AS
	SELECT ID_CONCEPTO, S_TEXTO FROM SYS_CONCEPTO WHERE S_TABLA = @S_TABLA --'FORMA_PAGO'
	--UNION
	--SELECT 0,'',0,'Seleccione',null
	
GO

/****** Object:  StoredProcedure [dbo].[SP_GET_DROPDOWNLIST]    Script Date: 09/07/2011 19:52:44 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
CREATE PROCEDURE [dbo].[SP_GET_DROPDOWNLIST]  
AS  
  
  SELECT '0'  drop_value, 'Seleccione' drop_text 
 UNION  
 SELECT 'SI'  drop_value, 'SI' drop_text 
 UNION  
  SELECT 'NO'  drop_value, 'NO' drop_text

GO

/****** Object:  StoredProcedure [dbo].[SP_GET_FORM_INICIAL]    Script Date: 09/07/2011 19:52:44 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

CREATE PROCEDURE [dbo].[SP_GET_FORM_INICIAL]  
  @ID_FORM INT  
AS  
  
 SELECT * FROM SYS_FORM_OBJETO  
 WHERE FK_FORM= @ID_FORM
 order by orden
 
GO

/****** Object:  StoredProcedure [dbo].[SP_Get_Preguntas]    Script Date: 09/07/2011 19:52:45 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
--SP_Get_Preguntas 3,8  
  
CREATE procedure [dbo].[SP_Get_Preguntas]  
   @p_prueba numeric(18,0)  
   ,@k_seccion as numeric(18,0)  
as  
SELECT                 dbo.TB_PRUEBA_DISENO_PREGUNTA.P_PREGUNTA,   
                      dbo.TB_PRUEBA_DISENO_PREGUNTA.S_DESCRIPCION_PREGUNTA, dbo.TB_PRUEBA_DISENO_PREGUNTA.M_IMAGEN_PREGUNTA,   
                      dbo.TB_PRUEBA_DISENO_PREGUNTA.S_MUESTRA_IMAGEN, dbo.TB_PRUEBA_DISENO_PREGUNTA.I_PUNTOS_PREGUNTA,   
                      dbo.TB_PRUEBA_DISENO_PREGUNTA.I_NRO_PREGUNTA, dbo.TB_PRUEBA_DISENO_PREGUNTA.K_TIPO_PREGUNTA , S_URL_IMAGEN  
FROM         dbo.TB_PRUEBA_DISENO INNER JOIN  
                      dbo.TB_PRUEBA_DISENO_SECCION ON dbo.TB_PRUEBA_DISENO.P_PRUEBA = dbo.TB_PRUEBA_DISENO_SECCION.K_PRUEBA INNER JOIN  
                      dbo.TB_PRUEBA_DISENO_PREGUNTA ON dbo.TB_PRUEBA_DISENO_SECCION.P_SECCION = dbo.TB_PRUEBA_DISENO_PREGUNTA.K_SECCION  
                        
where P_PRUEBA = @p_prueba   
and TB_PRUEBA_DISENO_SECCION.P_SECCION = @k_seccion   
  
                        
GO

/****** Object:  StoredProcedure [dbo].[SP_GET_PRUEBA_DISENNO]    Script Date: 09/07/2011 19:52:45 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO




create Procedure [dbo].[SP_GET_PRUEBA_DISENNO]
	@Texto varchar(500)
	,@S_AUD_USUARIO_C VARCHAR(30)
AS

SET NOCOUNT ON;

select 
	p_prueba,
	I_NRO_SECCIONES ,
	S_CODIGO_PRUEBA ,
	S_NOMBRE_PRUEBA ,
	S_ESTADO,
	s_observacion
from dbo.TB_PRUEBA_DISENO
where S_AUD_USUARIO_C = @S_AUD_USUARIO_C
AND (S_NOMBRE_PRUEBA like '%' + @Texto + '%'
or S_CODIGO_PRUEBA  like '%' + @Texto + '%')


 
GO

/****** Object:  StoredProcedure [dbo].[SP_INSERTA_PRUEBA_DISENO_ALTERNATIVA]    Script Date: 09/07/2011 19:52:45 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

      
CREATE procedure [dbo].[SP_INSERTA_PRUEBA_DISENO_ALTERNATIVA]      
      
  @P_RESPUESTA  numeric(18,0)       
           ,@K_TIPO_PREGUNTA  numeric(18,0)       
           ,@K_PREGUNTA  numeric(18,0)       
           ,@I_FILA  int       
           ,@S_R1  varchar(4000)       
           ,@S_R2  varchar(4000)       
           ,@S_R3 varchar(4000)       
           ,@S_R4  varchar(4000)       
           ,@S_R5  varchar(4000)       
           ,@S_CORRECTA  varchar(4000)       
           ,@I_PUNTOS  int       
           ,@M_R1  image       
           ,@M_R2  image       
           ,@M_R3  image       
           ,@M_R4  image       
           ,@M_R5  image       
           ,@S_AUD_USUARIO_C varchar(50)       
           ,@S_AUD_USUARIO_M  varchar(50)       
           ,@D_AUD_FECHA_C  varchar(16)       
           ,@D_AUD_FECHA_M  varchar(16)      
           ,@url1 as varchar(500)      
           ,@url2 as varchar(500)    
           ,@url3 as varchar(500)    
           ,@url4 as varchar(500)    
           ,@url5 as varchar(500)    
                 
AS      
    
--declare @maxid numeric(18,0)    
    
--select @maxid=isnull(max(P_RESPUESTA),0) +1 from TB_PRUEBA_DISENO_ALTERNATIVA     
    
    
INSERT INTO [TB_PRUEBA_DISENO_ALTERNATIVA]      
           (     
            [K_TIPO_PREGUNTA]      
           ,[K_PREGUNTA]      
           ,[I_FILA]      
           ,[S_R1]      
           ,[S_R2]      
           ,[S_R3]      
           ,[S_R4]      
           ,[S_R5]      
           ,[S_CORRECTA]      
           ,[I_PUNTOS]      
           ,[M_R1]      
           ,[M_R2]      
           ,[M_R3]      
           ,[M_R4]      
           ,[M_R5]      
           ,[S_AUD_USUARIO_C]      
           ,[S_AUD_USUARIO_M]      
           ,[D_AUD_FECHA_C]      
           ,[D_AUD_FECHA_M]    
           ,s_ruta1    
           ,s_ruta2    
           ,s_ruta3    
           ,s_ruta4    
           ,s_ruta5    
           )      
     VALUES      
           (                     
           @K_TIPO_PREGUNTA      
           ,@K_PREGUNTA      
           ,@I_FILA      
           ,@S_R1      
           ,@S_R2      
           ,@S_R3      
           ,@S_R4      
           ,@S_R5      
           ,@S_CORRECTA      
           ,@I_PUNTOS      
           ,@M_R1      
           ,@M_R2      
           ,@M_R3      
           ,@M_R4      
           ,@M_R5      
           ,@S_AUD_USUARIO_C      
           ,@S_AUD_USUARIO_M      
           ,@D_AUD_FECHA_C      
           ,@D_AUD_FECHA_M      
           ,@url1    
           ,@url2    
           ,@url3    
           ,@url4    
           ,@url5    
           )      
      
      
  execute SP_OBTIENE_PRUEBA_DISENO_ALTERNATIVA @K_PREGUNTA    
      
      
--SELECT     
     
-- p_respuesta    
--,K_PREGUNTA    
--,k_tipo_pregunta    
--,i_fila    
--,s_r1    
--,s_r2    
--,s_r3    
--,s_r4    
--,s_r5    
--,s_correcta    
--,i_puntos    
--,s_ruta1    
--,s_ruta2    
--,s_ruta3    
--,s_ruta4    
--,s_ruta5    
--FROM [TB_PRUEBA_DISENO_RESPUESTA]       
--WHERE K_PREGUNTA = @K_PREGUNTA 
GO

/****** Object:  StoredProcedure [dbo].[SP_INSERTA_PRUEBA_DISENO_LATERNATIVA]    Script Date: 09/07/2011 19:52:47 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
CREATE procedure [dbo].[SP_INSERTA_PRUEBA_DISENO_LATERNATIVA]  
  
  @P_RESPUESTA  numeric(18,0)   
           ,@K_TIPO_PREGUNTA  numeric(18,0)   
           ,@K_PREGUNTA  numeric(18,0)   
           ,@I_FILA  int   
           ,@S_R1  varchar(4000)   
           ,@S_R2  varchar(4000)   
           ,@S_R3 varchar(4000)   
           ,@S_R4  varchar(4000)   
           ,@S_R5  varchar(4000)   
           ,@S_CORRECTA  varchar(4000)   
           ,@I_PUNTOS  int   
           ,@M_R1  image   
           ,@M_R2  image   
           ,@M_R3  image   
           ,@M_R4  image   
           ,@M_R5  image   
           ,@S_AUD_USUARIO_C varchar(50)   
           ,@S_AUD_USUARIO_M  varchar(50)   
           ,@D_AUD_FECHA_C  varchar(16)   
           ,@D_AUD_FECHA_M  varchar(16)  
           ,@url1 as varchar(500)  
           ,@url2 as varchar(500)
           ,@url3 as varchar(500)
           ,@url4 as varchar(500)
           ,@url5 as varchar(500)
             
AS  

declare @maxid numeric(18,0)

select @maxid=isnull(max(P_RESPUESTA),0) +1 from TB_PRUEBA_DISENO_ALTERNATIVA


INSERT INTO [TB_PRUEBA_DISENO_ALTERNATIVA]  
           ( P_RESPUESTA
           ,[K_TIPO_PREGUNTA]  
           ,[K_PREGUNTA]  
           ,[I_FILA]  
           ,[S_R1]  
           ,[S_R2]  
           ,[S_R3]  
           ,[S_R4]  
           ,[S_R5]  
           ,[S_CORRECTA]  
           ,[I_PUNTOS]  
           ,[M_R1]  
           ,[M_R2]  
           ,[M_R3]  
           ,[M_R4]  
           ,[M_R5]  
           ,[S_AUD_USUARIO_C]  
           ,[S_AUD_USUARIO_M]  
           ,[D_AUD_FECHA_C]  
           ,[D_AUD_FECHA_M]
           ,s_ruta1
           ,s_ruta2
           ,s_ruta3
           ,s_ruta4
           ,s_ruta5
           )  
     VALUES  
           (
            @MaxId 
           ,@K_TIPO_PREGUNTA  
           ,@K_PREGUNTA  
           ,@I_FILA  
           ,@S_R1  
           ,@S_R2  
           ,@S_R3  
           ,@S_R4  
           ,@S_R5  
           ,@S_CORRECTA  
           ,@I_PUNTOS  
           ,@M_R1  
           ,@M_R2  
           ,@M_R3  
           ,@M_R4  
           ,@M_R5  
           ,@S_AUD_USUARIO_C  
           ,@S_AUD_USUARIO_M  
           ,@D_AUD_FECHA_C  
           ,@D_AUD_FECHA_M  
           ,@url1
           ,@url2
           ,@url3
           ,@url4
           ,@url5
           )  
  
  
  execute SP_OBTIENE_PRUEBA_DISENO_ALTERNATIVA @K_PREGUNTA
  
  
--SELECT 
 
-- p_respuesta
--,K_PREGUNTA
--,k_tipo_pregunta
--,i_fila
--,s_r1
--,s_r2
--,s_r3
--,s_r4
--,s_r5
--,s_correcta
--,i_puntos
--,s_ruta1
--,s_ruta2
--,s_ruta3
--,s_ruta4
--,s_ruta5
--FROM [TB_PRUEBA_DISENO_RESPUESTA]   
--WHERE K_PREGUNTA = @K_PREGUNTA  
GO

/****** Object:  StoredProcedure [dbo].[SP_INSERTA_PRUEBA_EJECUCION_RESPUESTA]    Script Date: 09/07/2011 19:52:48 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


create procedure [dbo].[SP_INSERTA_PRUEBA_EJECUCION_RESPUESTA]
	  @FK_RESPUESTA as numeric(18,0)
	, @FK_PREGUNTA as numeric(18,0)
	, @FK_PRUEBA_EJECUCION as numeric(18,0)
	, @S_VALOR_RESPUESTA as varchar(4000)
as

set nocount on

declare @count numeric(18,0)

select @count= count(1)
from TB_PRUEBA_EJECUCION_RESPUESTA 
where FK_RESPUESTA = @FK_RESPUESTA
and   FK_PREGUNTA  = @FK_PREGUNTA
and   FK_PRUEBA_EJECUCION  = @FK_PRUEBA_EJECUCION

if @COUNT=0
begin
	insert into TB_PRUEBA_EJECUCION_RESPUESTA
	(FK_PRUEBA_EJECUCION,FK_RESPUESTA,FK_PREGUNTA,S_VALOR_RESPUESTA)
	values
	(@FK_PRUEBA_EJECUCION,@FK_RESPUESTA, @FK_PREGUNTA,@S_VALOR_RESPUESTA)
end
else
begin
	update TB_PRUEBA_EJECUCION_RESPUESTA
	set S_VALOR_RESPUESTA = @S_VALOR_RESPUESTA
	where FK_PRUEBA_EJECUCION = @FK_PRUEBA_EJECUCION
	and FK_RESPUESTA = @FK_RESPUESTA
	and FK_PREGUNTA = @FK_PREGUNTA
	
end





GO

/****** Object:  StoredProcedure [dbo].[SP_OBTIENE_PRUEBA_DISENO_ALTERNATIVA]    Script Date: 09/07/2011 19:52:48 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
CREATE procedure [dbo].[SP_OBTIENE_PRUEBA_DISENO_ALTERNATIVA]  
     @K_PREGUNTA NUMERIC(18,0)  
   AS  
  

SELECT  
 p_respuesta
,K_PREGUNTA
,k_tipo_pregunta
,i_fila
,s_r1
,s_r2
,s_r3
,s_r4
,s_r5
,s_correcta
,i_puntos
,s_ruta1
,s_ruta2
,s_ruta3
,s_ruta4
,s_ruta5
FROM [TB_PRUEBA_DISENO_ALTERNATIVA]   
WHERE K_PREGUNTA = @K_PREGUNTA  


GO

/****** Object:  StoredProcedure [dbo].[SP_SAVE_ALUMNO]    Script Date: 09/07/2011 19:52:48 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO




CREATE PROCEDURE  [dbo].[SP_SAVE_ALUMNO]
 @P_ALUMNO	VARCHAR(90)
,@S_RUT_ALUMNO	VARCHAR(90)
,@S_NOMBRES_ALUMNO	VARCHAR(90)
,@S_PATERNO_ALUMNO	VARCHAR(90)
,@S_MATERNO_ALUMNO	VARCHAR(90)
,@S_DIRECCION	VARCHAR(250)
,@FK_CIUDAD	VARCHAR(90)
,@FK_COMUNA	VARCHAR(90)
,@FECHA_NAC VARCHAR(90)
,@usuario VARCHAR(90)
as

 
  
    IF @P_ALUMNO='' 
      BEGIN
      
			INSERT INTO TB_EST_ALUMNO 
			(
				S_RUT	,
				D_FECHA_NAC	,
				S_NOMBRE	,
				S_PATERNO	,
				S_MATERNO	,
				--K_ESTABLECIMIENTO	,
				S_DIRECCION	,
				FK_CIUDAD	,
				FK_COMUNA	,
				AUD_USUARIO_INS	,
				AUD_FECHA_INS	,
				AUD_USUARIO_UPD	,
				AUD_FECHA_UPD	
			)
			VALUES
			(			
			 --@P_ALUMNO	VARCHAR(90)
			 @S_RUT_ALUMNO	
			,@FECHA_NAC
			,@S_NOMBRES_ALUMNO
			,@S_PATERNO_ALUMNO
			,@S_MATERNO_ALUMNO
			,@S_DIRECCION	
			,@FK_CIUDAD	
			,@FK_COMUNA				
			,@usuario 
			,convert(varchar,getdate(),112)
			,@usuario 
			,convert(varchar,getdate(),112)
			)
				 select 'OK'
      
      END
   else
   begin
   
   				UPDATE TB_EST_ALUMNO 
				SET S_RUT	=@S_RUT_ALUMNO	,
				D_FECHA_NAC	=@FECHA_NAC,
				S_NOMBRE=	@S_NOMBRES_ALUMNO,
				S_PATERNO=	@S_PATERNO_ALUMNO,
				S_MATERNO=	@S_MATERNO_ALUMNO,				
				S_DIRECCION=	@S_DIRECCION,
				FK_CIUDAD=	@FK_CIUDAD,
				FK_COMUNA=	@FK_COMUNA,
				AUD_USUARIO_UPD	=@usuario,
				AUD_FECHA_UPD	=convert(varchar,getdate(),112)
				WHERE P_ALUMNO	= @P_ALUMNO	
			 		
				 select 'OK'
				 
   end
      



GO

/****** Object:  StoredProcedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_PK]    Script Date: 09/07/2011 19:52:49 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


create Procedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_PK]
 @ID_PRUEBA numeric(18,0)
AS

SET NOCOUNT ON;

select 
I_NRO_SECCIONES ,
S_CODIGO_PRUEBA ,
S_NOMBRE_PRUEBA ,
S_ESTADO
from dbo.TB_PRUEBA_DISENO
where p_prueba = @ID_PRUEBA
GO

/****** Object:  StoredProcedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_PREGUNTA]    Script Date: 09/07/2011 19:52:49 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

  
  
CREATE Procedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_PREGUNTA]   
 @p_prueba  numeric(18,0)  
AS  
  
  SET NOCOUNT ON;  
  
  SELECT    TB_PRUEBA_DISENO_SECCION.I_NRO_SECCION, 
			TB_PRUEBA_DISENO_PREGUNTA.P_PREGUNTA,   
			TB_PRUEBA_DISENO_PREGUNTA.I_NRO_PREGUNTA, 
			TB_PRUEBA_DISENO_PREGUNTA.I_PUNTOS_PREGUNTA, 
			TB_PRUEBA_DISENO_PREGUNTA.K_TIPO_PREGUNTA ,  
			tb_prueba_diseno_pregunta.S_DESCRIPCION_PREGUNTA
  FROM         TB_PRUEBA_DISENO INNER JOIN   
  TB_PRUEBA_DISENO_SECCION ON TB_PRUEBA_DISENO.P_PRUEBA = TB_PRUEBA_DISENO_SECCION.K_PRUEBA INNER JOIN   
  TB_PRUEBA_DISENO_PREGUNTA ON TB_PRUEBA_DISENO_SECCION.P_SECCION = TB_PRUEBA_DISENO_PREGUNTA.K_SECCION   
  where p_prueba = @p_prueba  
  order by I_NRO_SECCION, I_NRO_PREGUNTA   
GO

/****** Object:  StoredProcedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_SECCION_FK]    Script Date: 09/07/2011 19:52:50 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO



CREATE Procedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_SECCION_FK] 
 @FK_PRUEBA  numeric(18,0)
AS

SET NOCOUNT ON;

SELECT 
 p_SECCION 
,S_NOMBRE_SECCION 
,I_PUNTOS 

FROM TB_PRUEBA_DISENO_SECCION
WHERE K_PRUEBA = @FK_PRUEBA


GO

/****** Object:  StoredProcedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_SECCION_PK]    Script Date: 09/07/2011 19:52:50 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO


CREATE Procedure [dbo].[SP_SELECCIONA_PRUEBA_DISENNO_SECCION_PK] 
 @ID_SECCION numeric(18,0)
AS

SET NOCOUNT ON;

SELECT 
 K_PRUEBA 
,S_NOMBRE_SECCION 
,I_PUNTOS 

FROM TB_PRUEBA_DISENO_SECCION
WHERE p_SECCION = @ID_SECCION




GO

/****** Object:  StoredProcedure [dbo].[SP_SYS_GET_MENU_HIJO]    Script Date: 09/07/2011 19:52:50 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

--SP_SYS_GET_MENU_PADRE 1,NULL

CREATE procedure [dbo].[SP_SYS_GET_MENU_HIJO]
	  @ID_PADRE VARCHAR(30)	
	 ,@PERFIL VARCHAR(30)
	 ,@USUARIO VARCHAR(30)
AS

SELECT     dbo.SYS_MENU.ID_MENU, dbo.SYS_MENU.NOMBRE AS SNOMBRE , dbo.SYS_MENU.TIENE_HIJO bfolder, dbo.SYS_MENU.ID_MENU_PADRE, dbo.SYS_MENU.URL surl, 
                      dbo.SYS_MENU.NombrePagina, dbo.SYS_MENU.Vigente, dbo.SYS_MENU.Img_URL, ISNULL(dbo.SYS_MENU_PERFIL.IMPRIMIR, 'N') 
                      + ',' + ISNULL(dbo.SYS_MENU_PERFIL.MODIFICAR, 'N') + ',' + ISNULL(dbo.SYS_MENU_PERFIL.CREAR, 'N') + ',' + ISNULL(dbo.SYS_MENU_PERFIL.ELIMINAR, 'N') 
                      AS Accesos
FROM         dbo.SYS_MENU LEFT OUTER JOIN
                      dbo.SYS_MENU_PERFIL ON dbo.SYS_MENU.ID_MENU = dbo.SYS_MENU_PERFIL.ID_MENU
WHERE SYS_MENU.VIGENTE = 'V'
AND ID_MENU_PADRE= @ID_PADRE
AND SYS_MENU_PERFIL.ID_PERFIL = @PERFIL
ORDER BY ORDEN
                      
                      
GO

/****** Object:  StoredProcedure [dbo].[SP_SYS_GET_MENU_PADRE]    Script Date: 09/07/2011 19:52:51 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

--SP_SYS_GET_MENU_PADRE 1,NULL

CREATE procedure [dbo].[SP_SYS_GET_MENU_PADRE]
	 @PERFIL VARCHAR(30)
	,@USUARIO VARCHAR(30)
AS

SELECT     dbo.SYS_MENU.ID_MENU, dbo.SYS_MENU.NOMBRE AS SNOMBRE , dbo.SYS_MENU.TIENE_HIJO bfolder, dbo.SYS_MENU.ID_MENU_PADRE, dbo.SYS_MENU.URL surl, 
                      dbo.SYS_MENU.NombrePagina, dbo.SYS_MENU.Vigente, dbo.SYS_MENU.Img_URL, ISNULL(dbo.SYS_MENU_PERFIL.IMPRIMIR, 'N') 
                      + ',' + ISNULL(dbo.SYS_MENU_PERFIL.MODIFICAR, 'N') + ',' + ISNULL(dbo.SYS_MENU_PERFIL.CREAR, 'N') + ',' + ISNULL(dbo.SYS_MENU_PERFIL.ELIMINAR, 'N') 
                      AS Accesos
FROM         dbo.SYS_MENU LEFT OUTER JOIN
                      dbo.SYS_MENU_PERFIL ON dbo.SYS_MENU.ID_MENU = dbo.SYS_MENU_PERFIL.ID_MENU
WHERE SYS_MENU.VIGENTE = 'V'
AND ID_MENU_PADRE=0
AND SYS_MENU_PERFIL.ID_PERFIL = @PERFIL
ORDER BY ORDEN
                      
                      
GO


